home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / dbtable.dxr / 00030_scroll bed subclass.ls < prev    next >
Encoding:
Text File  |  2000-01-18  |  376 b   |  16 lines
  1. property ancestor
  2.  
  3. on new me, buttonName, castName, theChannel, theStageLoc, Slider, numSettingsPerPage, descendant
  4.   if objectp(descendant) then
  5.     PassVar = descendant
  6.   else
  7.     PassVar = me
  8.   end if
  9.   ancestor = new(script("scroll bed"), buttonName, castName, theChannel, theStageLoc, Slider, numSettingsPerPage, PassVar)
  10.   return me
  11. end
  12.  
  13. on buttonLoc me
  14.   return me
  15. end
  16.